(unrmail): Call rmail-toggle-header.

diff --git a/lisp/mail/unrmail.el b/lisp/mail/unrmail.el
index 46c4b3de259124180e1a652cd1c32418a48499e8..20e41287e7179c2381358e40efaf557c5081345d 100644 (file)
--- a/lisp/mail/unrmail.el
+++ b/lisp/mail/unrmail.el
@@ -56,6 +56,7 @@ For example, invoke `emacs -batch -f batch-unrmail RMAIL'."
     (while (< message-count rmail-total-messages)
       (rmail-show-message
        (setq message-count (1+ message-count)))
+      (rmail-toggle-header)
       (rmail-output to-file 1 t))
     (message "Writing messages to %s...done" to-file)))